home *** CD-ROM | disk | FTP | other *** search
/ Adobe Digital Video Collection / Digital Video Collection CD.iso / After Effects 5.5 / MMScriptJpn.Cab / F115717_gravity.mm < prev    next >
Encoding:
Text File  |  2001-12-07  |  1.5 KB  |  46 lines
  1. // Gravity - Version 1.3
  2.  
  3. // é▒é╠âXâNâèâvâgé═üAéPö╘û┌é╠â|âbâvâAâbâvâüâjâàü[é╠âîâCâäü[é╔Ådù═é≡ôKùpé╡é▄é╖üB
  4. // âÅü[âNâGâèâAé╠èJÄnÄ₧é╔É▌ÆΦé│éΩé─éóéΘæ¼ôxé¬üA
  5.  
  6. // Åëè·æ¼ôxé╞é╡é─Ägùpé│éΩé▄é╖üB
  7.  
  8. //      âîâCâäü[                            âvâìâpâeâB               â`âââôâlâï
  9. //      ------                              ----------               --------
  10. // 1: Ådù═é╠ôKùpɵâîâCâäü[                  Ägùpé╡é╚éó               Ägùpé╡é╚éó
  11. // 2: Ägùpé╡é╚éó                            Ägùpé╡é╚éó               Ägùpé╡é╚éó
  12.  
  13. if (time() == start_time) {
  14.     vel = tmap (time() + step_time, value(pop_layer(1), position)) -
  15.            value(pop_layer(1), position);
  16.     damping = 0.95;                                // î╕Éèù═üiéOüüûÇÄCù═û│î└æσüAéPüüûÇÄCù═é╚é╡üj
  17.     grav = 0.9;                                         // Ådù═é╠æσé½é│
  18.     grav_dir = {0,1,0};                        // Ådù═é╠ò√îⁿ
  19.     accel = grav * grav_dir;      // Ådù═é╠âxâNâgâï
  20.  
  21.     new_pos = value(pop_layer(1), position);
  22. } else {
  23.  
  24.     vel = vel*damping + accel;                        // ò¬ÄUë┴æ¼ôxé≡æ¼ôxé╔Æ╟ë┴
  25.     new_pos = new_pos + vel;                 // ò¬ÄUæ¼ôxé≡ê╩Æué╔Æ╟ë┴
  26.     
  27.     // âRâôâ|âWâVâçâôé╠ï½èEé⌐éτÆ╡é╦ò╘éΘê╩Æué≡èmöF
  28.     if (new_pos[X] < 0) {
  29.         new_pos[X] = 0;
  30.         vel = {-vel[X], vel[Y]};
  31.     }
  32.     if (new_pos[Y] < 0) {
  33.         new_pos[Y] = 0;
  34.         vel = {vel[X], -vel[Y]};
  35.     }
  36.     if (new_pos[X] > comp_size[X]) {
  37.         new_pos[X] = comp_size[X];
  38.         vel = {-vel[X], vel[Y]};
  39.     }
  40.     if (new_pos[Y] > comp_size[Y]) {
  41.         new_pos[Y] = comp_size[Y];
  42.         vel = {vel[X], -vel[Y]};
  43.     }    
  44. }
  45. value(pop_layer(1), position) = new_pos;
  46.